﻿Imports Microsoft.VisualBasic

Public Class Calendar

    Private _AppointmentID As Integer
    Public Property AppointmentID() As Integer
        Get
            Return _AppointmentID
        End Get
        Set(ByVal value As Integer)
            _AppointmentID = value
        End Set
    End Property


    Private _DateEvent As Date
    Public Property DateEvent() As Date
        Get
            Return _DateEvent
        End Get
        Set(ByVal value As Date)
            _DateEvent = value
        End Set
    End Property


    Private _Header As String
    Public Property Header() As String
        Get
            Return _Header
        End Get
        Set(ByVal value As String)
            _Header = value
        End Set
    End Property


    Private _Texten As String
    Public Property Texten() As String
        Get
            Return _Texten
        End Get
        Set(ByVal value As String)
            _Texten = value
        End Set
    End Property

End Class
